function s = skewness(x)
% SKEWNESS  returns the skewness value of data vector
%           s = skewness(x)
%           s   skewness (normalised third moment)
%           x   data vector

%   Copyright 2001, Saven EduTech AB. 
%   Revision: 1.1  Date: 2001-05-21 


m2 = sum(x.^2)/length(x);
m3 = sum(x.^3)/length(x);
s = m3/m2^(3/2);

